   2 .
   4 .
   5 CLEAR ;BC=8;FC=150;NT=0
  10 CY=35;CX=-33;PRINT "A I R  R A I D
  20 CY=16;PRINT "    USE HAND CONTROL #1
  30 CY=8;PRINT "   THE TRIGGER FIRES GUN
  40 CY=0;PRINT "     THE KNOB AIMS GUN
  50 CY=-16;INPUT "    DIFFICULTY 1-2 ?:"V
  60 CLEAR ;E=0;D=0;FC=7;GOSUB 310
  70 CLEAR ;BC=8;IF E=4GOTO 330
  80 E=E+1;CY=0;PRINT "      MAN THE GUNS";FOR J=1TO 175;NEXT J;CLEAR 
  90 XY=-2367;LINE -45,15,3;XY=4051;LINE -19,-20,3;XY=-3534;LINE 70,25,3;XY=6470;LINE 79,14,3
 100 XY=-544;LINE 0,25,3;XY=-3606;LINE -15,-6,3;XY=6400;LINE 16,2,3;XY=3870;LINE 70,-40,3;XY=-1295;LINE 15,-37,3
 110 XY=-4610;LINE 30,15,3;XY=-10063;LINE 79,-40,3;FOR J=1TO 25;I=RND (3)+1;K=RND (160)-81;BOX K,-39,5,1,3;BOX K,-38,1,I,3;NEXT J
 120 XY=6577;LINE -58,-20,3;XY=-4922;LINE -41,-20,3;XY=-4905;LINE -15,-40,3;BOX -50,-18,9,3,3;BOX -50,-15,3,3,3
 130 BOX -52,-18,1,1,3;BOX -48,-18,1,1,3;XY=-5668;LINE -36,-14,3;BOX -33,-15,4,2,3
 140 B=39;L=0;FOR A=80TO -80STEP -6;L=L+3
 150 IF L>=40L=0
 160 IF L<=20B=B-3;GOTO 180
 170 B=B+3;IF A<=-65GOTO 70
 180 GOSUB 300;CX=KN(1)÷2+2;CY=B;IF TR(1)=1GOSUB 210
 190 GOSUB 300
 200 Q=RND (8);IF Q=3LINE A,B,1=XY;H=XY;GOSUB 240
 205 NEXT A
 210 T=A+1;XY=-3378;LINE CX,CY,3;XY=-3378;LINE CX,CY,3;NT=1;MU=16;&(21)=255;MU=14;&(23)=255;MU=14
 215 IF V=1IF CX>=AIF CX<=TGOTO 280
 220 IF V>=2IF CX=AGOTO 280
 230 NT=0;&(21)=0;RETURN 
 240 D=D+1;LINE A,-40,3;GOSUB 300;XY=H;LINE A,-40,3
 250 NT=1;MU=16;&(23)=255;MU=14;&(21)=255;MU=16;MU=16;&(21)=0;NT=0
 260 BOX A,-39,6,1,3;BOX A,-35,1,6,3;BOX A,-33,5,1,3;GOSUB 300;RETURN 
 270 BOX A,C-3,1,1,3;BOX A+4,C,4,2,3;BOX A-3,C,4,2,3;BOX A,C,3,5,3;BOX A,C+3,5,1,3;RETURN 
 280 GOSUB 300;FOR C=BTO -10STEP -6;GOSUB 270;GOSUB 270;NEXT C;GOSUB 270
 290 NT=2;FOR Z=1TO 12;CX=A;BOX CX,-18,RND (5),RND (5),3;NEXT Z;&(23)=0;FOR N=255TO 20STEP -3;BC=N;MU=Y;&(23)=N;NEXT N;NT=0;&(21)=0;GOTO 70
 300 BOX A-2,B,1,1,3;BOX A,B,5,2,3;BOX A+2,B+1,1,1,3;RETURN 
 310 NT=1;FOR M=1TO 5;BC=80;CY=-32;CX=-20;PRINT "WARNING";CY=-32;CX=-20;PRINT "       "
 320 CY=20;CX=-10;PRINT "A I R";CY=4;CX=-22;PRINT "A L E R T";NEXT M;BC=8;NT=0;RETURN 
 330 F=20-D;F=F×50;CY=40;PRINT "   POSSIBLE SCORE:1000";CY=24;PRINT "     YOUR SCORE:",#3,F
 350 CY=8;PRINT "       YOUR RATING:
 360 CY=-8;IF F=1000CX=-15;PRINT "EXPERT
 370 IF F<1000IF F>799PRINT "       SHARPSHOOTER
 380 IF F<800IF F>599CX=-29;PRINT "MARKSMAN
 390 IF F<600CX=-29;PRINT "BEGINNER
 395 FOR A=0TO 999;NEXT A
 400 RUN 
>:RETURN ;RUN 
